(de javaAsPico (Object)
  (when Object
    (let Class (java Object "getClass")
      (if (java (java Class "isArray") )
        (let Pico (java Object)
          (if (lst? Pico)
            Pico
            (arrayAsList Object) )
          (or Pico Object) ) ) ) ) )